10000 POKE53280,0:POKE53281,0:PRINTCHR$(147):
10010 Z$(0)="[145][145][223][169][223][169][223][169][223][169][223][169][223][169]               [146] [223][169][223][169][223][169][223][169][223][169][223][169]":
10020 Z$(1)="            [209][209][209] [209]  [209] [209][209]  [209][209][209]"
10030 Z$(2)="            [209]   [209][209] [209] [209] [209] [209]  "
10040 Z$(3)="            [209][209]  [209] [209][209] [209] [209] [209][209] "
10050 Z$(4)="            [209]   [209]  [209] [209] [209] [209]  "
10060 Z$(5)="            [209][209][209] [209]  [209] [209][209]  [209][209][209] "
10070 :FORI=0TO5:Z=I:POKE646,INT(RND(0)*15)+1 :GOSUB10130:NEXTI
10080 FOR I=0TO25:GOSUB10150
10090 FOR I=0TO2STEP.5:A=TI+1
10100 IFA>(TI-1+I)THENPRINT"[145][145][145][145][145][145][145][145][145][145][145][145]            NUN IST WIEDER:             "
10110 NEXTI:IFTI=I+(A+1)THEN10180:
10120 IF(K<10)AND(T<10)THEN10070
10130 PRINTZ$(I)
10140 RETURN
10150 A=TI
10160 IFTI<(A+60)THEN10160:
10170 RETURN
10180 PRINT"DAS WAR'S DANN!!"